data<-read.table(" ../geneexpression_survival_bootstrap/input_expr",sep="\t",head=T)
data<-read.table("../geneexpression_survival_bootstrap/input_expr",sep="\t",head=T)
genes_maintop400_paper<-read.table("genes_maintop400_paper_genexp.txt")
gene_uniq_snps_maintop400_paper<-read.table("gene_uniq_snps_maintop400_paper.txt")
